home *** CD-ROM | disk | FTP | other *** search
-
- /********************************************************************
- * *
- * Source File: stock.c *
- * Description: Marc's Stock Application *
- * Date: Wed Jul 31 18:58:47 1991 *
- * *
- ********************************************************************/
-
- #include "windows.h"
- #include "pv.h"
- #include <time.h>
- #include "stock.h"
-
-
- //VARIABLES_BEGIN
- //VARIABLES_END
-
- long FAR PASCAL MainWndProc(HWND, unsigned, WORD, LONG);
- HANDLE hInst;
- HANDLE hAccel;
-
- int PASCAL WinMain(hInstance, hPrevInstance, lpszCmdLine, nCmdShow)
- HANDLE hInstance, hPrevInstance;
- LPSTR lpszCmdLine;
- int nCmdShow;
- {
- static char szAppName[] = "stock";
- //BEGINFUNCTION_BEGIN
- //BEGINFUNCTION_END
-
- MSG msg;
- HWND hWndMain;
- WNDCLASS wndclass;
-
- hInst = hInstance; // Store the application instance handle
-
- if(!hPrevInstance)
- {
- wndclass.style = CS_HREDRAW | CS_VREDRAW;
- wndclass.lpfnWndProc = MainWndProc;
- wndclass.cbClsExtra = 0;
- wndclass.cbWndExtra = 0;
- wndclass.hInstance = hInstance;
- wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
- wndclass.hIcon = LoadIcon(hInstance, "c:\msj\stock\stock");
- wndclass.hbrBackground = CreateSolidBrush((LONG)55551);
- wndclass.lpszMenuName = "stock";
- wndclass.lpszClassName = szAppName;
-
- if(!RegisterClass(&wndclass))
- return FALSE;
- }
- lpfnMakeLongPointer = MakeProcInstance(MakeLongPointer, hInst);
- hAccel = LoadAccelerators(hInstance, "stock");
-
- //INITVIEW_BEGIN
- //INITVIEW_END
-
- if(!(hWndMain = CreateWindow(szAppName,
- "MSJ Stock App - ProtoView Version",
- WS_OVERLAPPEDWINDOW,
- CW_USEDEFAULT, 0,
- CW_USEDEFAULT, 0,
- NULL, NULL, hInstance, NULL)))
- return FALSE;
-
- //MAINWND_BEGIN
- //MAINWND_END
- ShowWindow(hWndMain, nCmdShow);
- UpdateWindow(hWndMain);
-
- while(GetMessage(&msg, NULL, 0, 0))
- if(!TranslateAccelerator(hWndMain, hAccel, &msg))
- {
- TranslateMessage(&msg);
- DispatchMessage(&msg);
- }
-
- //APPTERM_BEGIN
- //APPTERM_END
-
-
- return msg.wParam;
- }
-
- long FAR PASCAL MainWndProc(HWND hWnd, unsigned wMessage, WORD wParam, LONG lParam)
- {
- int ReturnCode;
- //WINDOWPROCVARIABLES_BEGIN
- //WINDOWPROCVARIABLES_END
-
- switch(wMessage)
- {
- //WINDOWPROC_BEGIN
- //WINDOWPROC_END
-
- case WM_COMMAND :
- if(!LOWORD(lParam))
- { // Process Menu Commands
- switch(wParam) // Determine which Menu ID
- {
- case IDM_NEW :
- if(fnGRAPH(hWnd))
- {
- //PROCESSMENU101_BEGIN
- //PROCESSMENU101_END
- }
- break;
- case IDM_ADDTICK :
- if(fnA_TICK(hWnd))
- {
- //PROCESSMENU102_BEGIN
- //PROCESSMENU102_END
- }
- break;
- case IDM_OPEN :
- if(fnOPEN(hWnd))
- {
- //PROCESSMENU103_BEGIN
- //PROCESSMENU103_END
- }
- break;
- case IDM_EXIT :
- {
- //PROCESSMENU104_BEGIN
- PostQuitMessage(0);
- //PROCESSMENU104_END
- }
- break;
- case IDM_CHANGETICK :
- if(fnC_TICK(hWnd))
- {
- //PROCESSMENU105_BEGIN
- //PROCESSMENU105_END
- }
- break;
- case IDM_OPTIONS :
- if(fnGRAPH(hWnd))
- {
- //PROCESSMENU106_BEGIN
- //PROCESSMENU106_END
- }
- break;
- case IDM_COLORS :
- if(fnCOLOR(hWnd))
- {
- //PROCESSMENU107_BEGIN
- //PROCESSMENU107_END
- }
- break;
- case IDM_FONTS :
- if(fnFONT(hWnd))
- {
- //PROCESSMENU108_BEGIN
- //PROCESSMENU108_END
- }
- break;
- case IDM_SAVE :
- {
- //PROCESSMENU109_BEGIN
- //PROCESSMENU109_END
- }
- break;
- case IDM_PRINT :
- {
- //PROCESSMENU110_BEGIN
- //PROCESSMENU110_END
- }
- break;
- case IDM_CLOSE :
- {
- //PROCESSMENU111_BEGIN
- //PROCESSMENU111_END
- }
- break;
- case IDM_TILE :
- {
- //PROCESSMENU112_BEGIN
- //PROCESSMENU112_END
- }
- break;
- case IDM_CASCADE :
- {
- //PROCESSMENU113_BEGIN
- //PROCESSMENU113_END
- }
- break;
- case IDM_ARRANGEICON :
- {
- //PROCESSMENU114_BEGIN
- //PROCESSMENU114_END
- }
- break;
- case IDM_CLOSEALL :
- {
- //PROCESSMENU115_BEGIN
- //PROCESSMENU115_END
- }
- break;
-
- }
- }
- else
- {
- //CUSTOMCOMMAND_BEGIN
- //CUSTOMCOMMAND_END
- }
-
- break;
-
- case WM_DESTROY :
- PostQuitMessage(0);
- break;
- default :
- return DefWindowProc(hWnd, wMessage, wParam, lParam);
- }
- return 0L;
- }
-
- BOOL FAR PASCAL MakeLongPointer()
- {
- static void far *Ptr;
- Ptr = &Ptr;
- return(HIWORD(Ptr));
- }
-
- //CUSTOMCODE_BEGIN
- //CUSTOMCODE_END
-